home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mac Mania 4
/
MacMania 4.toast
/
/
Demo's
/
Igor Demo Pro
/
1 PutContentsIn Igor Pro Folder
/
WaveMetrics Procedures
/
Graphing
/
Freeze Graph Size
< prev
next >
Wrap
Text File
|
1994-02-18
|
827b
|
23 lines
| This macro can freeze the top graph at its current size. This means that when
| you use the graph in a page layout or when you print it will always be the current
| size. This is useful in some cases to help get WYSIWYG results.
|
Macro FreezeGraphSize(doFreeze)
Variable doFreeze= 1
Prompt doFreeze,"action",popup "freeze;unfreeze"
PauseUpdate; Silent 1
if( doFreeze==1 )
GetWindow kwTopWin,gsize
Variable gleft= V_left, gtop= V_top,gright= V_right,gbottom= V_bottom
GetWindow kwTopWin,psize
Variable pleft= V_left, ptop= V_top,pright= V_right,pbottom= V_bottom
ModifyGraph margin(left)=pleft-gleft,margin(top)=ptop-gtop
ModifyGraph margin(right)=gright-pright,margin(bottom)=gbottom-pbottom
ModifyGraph width=pright-pleft,height=pbottom-ptop
else
ModifyGraph margin=0,width=0,height=0
endif
end